1 POKE45,144:POKE46,017:CLR:DIMROW(7),LIGHT$(7) 2 L1$="[152][176][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][174]":L2$="[221][155]-[158][204]OADING [196]OC. [198]ILE[155]-[152][221]" 3 L3$="[173][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][189]" 4 FORX=1TO7:ROW(X)=7+(2*(X-1)):NEXT:CO=1 5 LIGHT$(1)=" [211]YNTAX [197]RROR [215]EDGE [195]OMMANDS " 6 LIGHT$(2)=" [206]ON [205]ASKABLE [201]NTERRUPT [203]EYS " 7 LIGHT$(3)=" [193] [199]ENERAL [212]OPICS [196]ISCUSSION " 8 LIGHT$(4)=" [195]OMMENTS ON [195]OMPATIBILITY " 9 LIGHT$(5)=" [213]TILITY [200]ISTORY & [195]REDITS " 10 LIGHT$(6)=" [213]SE OF THE [211]CREEN [197]DITOR " 11 LIGHT$(7)=" [213]SE OF [216]-[205]ON 64 [195]OMMANDS " 12 POKE53265,PEEK(53265)AND239 13 POKE53280, 0:POKE53281, 0:PRINT"[147]"; 14 PRINT"[159][176]``````````````````````````````````````[174]}[181][146][153][166][166][166][166][166][182][146][158]sUPERaIDEdOCU"; 15 PRINT"MENTATION[181][146][153][166][166][166][166][166][182][146][159]}[171]``````````````````````````````````````[179]}[154]cURSO"; 16 PRINT"RrETURN[159]}}[154]TO[153]dOYOUWISHTOSEE:"; 17 PRINT"[154]TO[159]}}[154]sELECT[163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][154]cHOOSE[159]}}[176]```````````````"; 18 PRINT"``````````````[174]}}}[153] sYNTAX eRROR wEDGE cOMMANDS [146][159]}}}}"; 19 PRINT"}}}}[153]nONmASKABLEiNTERRUPTkEYS[159]}"; 20 PRINT"}}}}}}}[153]agENERALtOPICSdISCUS"; 21 PRINT"SION[159]}}}}}}}}[153]cOMMENTSON"; 22 PRINT"cOMPATIBILITY[159]}}}}}}}}[153]uTI"; 23 PRINT"LITYhISTORY&cREDITS[159]}}}}}}}"; 24 PRINT"}[153]uSEOFTHEsCREENeDITOR[159]}}}}"; 25 PRINT"}}}}[153]uSEOFx-mON64cOMMANDS[159]}}}[173]```````````````"; 26 PRINT"``````````````[189]}}[154]hARDCOPYMAYBEOBTAINEDBYPRESSING[159]}}[154]THEresto"; 27 PRINT"reKEYFOLLOWEDBYTHEdKEY[159]}}[154]AFTERTHEUTILITYHASBEENACTIVATED.[159]"; 28 PRINT"[221][173][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][153]"; 29 POKE2023,125:POKE56295,3:POKE53265,PEEK(53265)OR16:POKE198,0 30 GOSUB41 31 :POKE211,9:POKE214,3:SYS58732:PRINTL1$ 32 :POKE211,9:POKE214,4:SYS58732:PRINTL2$ 33 :POKE211,9:POKE214,5:SYS58732:PRINTL3$ 34 IFCO=1THENLOAD"WEDGE.DOC",8 35 IFCO=2THENLOAD"NMI.DOC",8 36 IFCO=3THENLOAD"TOPICS.DOC",8 37 IFCO=4THENLOAD"COMP.DOC",8 38 IFCO=5THENLOAD"CREDITS.DOC",8 39 IFCO=6THENLOAD"EDITOR.DOC",8 40 IFCO=7THENLOAD"XMON.DOC",8 41 GETW$ 42 PO=PEEK(1066)+128:IFPO>256THENPO=PO-256 43 FORX=1066TO1070:POKEX,PO:NEXTX 44 FORX=1097TO1101:POKEX,PO:NEXTX 45 IFW$=""THEN41 46 IFW$=CHR$(13)THENRETURN 47 IFW$<>""ANDW$<>"[157]"ANDW$<>"[145]"ANDW$<>""THENGOTO41 48 OLD=CO 49 IFW$="[145]"THENCO=CO-1:IFCO<1THENCO=7 50 IFW$="[145]"THENGOSUB54:GOTO41 51 CO=CO+1:IFCO>7THENCO=1:GOSUB54:GOTO41 52 GOSUB54:GOTO41 53 RETURN 54 POKE211,6:POKE214,ROW(OLD):SYS58732 55 PRINTLIGHT$(OLD) 56 POKE211,6:POKE214,ROW(CO):SYS58732 57 PRINT""LIGHT$(CO)"[146]" 58 RETURN